home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Info-Mac 4
/
Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso
/
Sound
/
Utilities
/
JUNO Librarian 1.0.7
/
Sample Scripts
/
20 Change DCO PWM ON⁄OFF
< prev
next >
Wrap
Text File
|
1994-01-28
|
388b
|
17 lines
tell application "JUNO Librarian"
activate -- if needed
set x to Parameter 16 of Window "Sample"
set y to (round (x ÷ 8) rounding down)
set y to y * 8
set z to x - y -- DCO range
set y to (round (y ÷ 16) rounding down)
set y to y * 16
set x to y + z
-- select 1 of 2
set x to x + 0 -- PWM OFF
-- set x to x + 8 -- PWM ON
copy x to Parameter 16 of Window "Sample"
end tell